Short[][…] = … (gb)

Dim hShortArray As Short[]
Dim aShort As Short
hShortArray [ Index As Integer, ... ] = aShort

Modifies the value stored in the array at Index.